/**
 * Copyright (c) 2009, Robert Schuster
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or
 * without modification, are permitted provided that the
 * following conditions are met:
 *
 * - Redistributions of source code must retain the above
 *   copyright notice, this list of conditions and the
 *   following disclaimer.
 * - Redistributions in binary form must reproduce the above
 *   copyright notice, this list of conditions and the
 *   following disclaimer in the documentation and/or other
 *   materials provided with the distribution.
 * - Neither the name of Robert Schuster nor the names of his
 *   contributors may be used to endorse or promote products
 *   derived from this software without specific prior written
 *   permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
 * CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

/* 
 * File:   CompiledProgram.cpp
 * Author: robert
 * 
 * Created on 1. September 2009, 15:26
 */

#include "CompiledProgram.hpp"

CompiledProgram::CompiledProgram(const char* source, const char* name, cl_context* context) throw (Error) {
    //create the programm-object
    int err = CL_SUCCESS;
    Program = clCreateProgramWithSource(*context, 1, (const char **) & source, NULL, &err);
    if (err != CL_SUCCESS) {
        throw Error(err);
    }

    // Build the program executable
    err = clBuildProgram(Program, 0, NULL, NULL, NULL, NULL);
    if (err != CL_SUCCESS) {
        Error error(err);
        //get the list of devices
        size_t num;
        err = clGetProgramInfo(Program, CL_PROGRAM_NUM_DEVICES, sizeof(num), &num, NULL);
        cl_device_id* devids = new cl_device_id[num];
        size_t ret;
        err = clGetProgramInfo(Program, CL_PROGRAM_DEVICES, sizeof(cl_device_id)*num, &devids[0], &ret);
        //get the compile-error
        char *temp = new char[1];
        err = clGetProgramBuildInfo(Program, devids[0], CL_PROGRAM_BUILD_LOG, sizeof(char), &temp[0], &ret);
        char *buffer2 = new char[ret];
        err = clGetProgramBuildInfo(Program, devids[0], CL_PROGRAM_BUILD_LOG, sizeof(char)*ret, &buffer2[0], &ret);
        error.Text.append(buffer2,ret);
        delete devids;
        //err = clGetProgramBuildInfo
        throw error;
    }

    //Create a Kernel-Object
    setName(name);
    cl_uint retnum;
    err = clCreateKernelsInProgram(Program, 1, &Kernel, &retnum);
    if (err != CL_SUCCESS) {
        throw Error(err);
    }
}

CompiledProgram::~CompiledProgram() {
    //cout << "~CompiledProgram()" << endl;
    clReleaseProgram(Program);
    clReleaseKernel(Kernel);
    //cout << "~CompiledProgram()" << endl;
}

cl_program* CompiledProgram::getProgram() {
    return &Program;
}

cl_kernel* CompiledProgram::getKernel() {
    return &Kernel;
}

void CompiledProgram::setName(const char* new_name) {
    Name = string(new_name);
}

const char* CompiledProgram::getName() {
    return Name.c_str();
}
